(speedbar-find-selected-file): RE-quote the filename.

diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index a880e5713209ab604080c230465737ee7f634558..e543aa5304d46e00c59b3d8fd3ff19e97d805720 100644 (file)
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -2874,7 +2874,7 @@ If new functions are added, their state needs to be updated here."
   (goto-char (point-min))
   (let ((m nil))
     (while (and (setq m (re-search-forward
-                        (concat " \\(" (file-name-nondirectory file)
+                        (concat " \\(" (regexp-quote (file-name-nondirectory file))
                                 "\\)\\(" speedbar-indicator-regex "\\)?\n")
                         nil t))
                (not (string= file